home *** CD-ROM | disk | FTP | other *** search
/ Fritz: All Fritz / All Fritz.zip / All Fritz / FILES / BUSITION / DISKJOB.LZH / INSTALL.BAT < prev    next >
DOS Batch File  |  1992-04-02  |  1KB  |  101 lines
  1. @echo off
  2. rem (C) Copyright 1991, DISKJOB, Inc.
  3. verify on
  4. if %1x==x goto START
  5. if %2x==x goto START
  6. goto finish
  7.  
  8. :start
  9. cls
  10. nocurs
  11. type mainmenu.doc
  12. :get_reply
  13. reply
  14. if errorlevel 64 goto get_reply
  15. if errorlevel 63 if not errorlevel 64 goto F5
  16. if errorlevel 62 if not errorlevel 63 goto F4
  17. if errorlevel 61 if not errorlevel 62 goto F3
  18. if errorlevel 60 if not errorlevel 61 goto F2
  19. if errorlevel 59 if not errorlevel 60 goto F1
  20. if errorlevel 0 if not errorlevel 59 goto get_reply
  21. :F5
  22. CLS
  23. goto end
  24. :F4
  25. goto restart3
  26. :F3
  27. goto restart2
  28. :F2
  29. goto restart
  30. :F1
  31. goto program
  32. cls
  33. nocurs
  34. reply
  35. goto start
  36.  
  37.  
  38. :finish
  39. normcurs
  40. cls
  41. type finish.doc
  42. echo                                *******
  43. echo          The following drive/directory were named:  %1%2
  44. echo                                *******
  45.          PAUSE
  46. cls
  47. ECHO          . . . Program is extracting DISKJOB files to %1%2 . . .
  48. install2 %1%2
  49. %1
  50. cd%2
  51. goto complete
  52. :RESTART
  53. normcurs
  54. cls
  55. type usermenu.doc
  56. pause
  57. goto end
  58. :RESTART2
  59. normcurs
  60. cls
  61. type usemenu2.doc
  62. pause
  63. goto end
  64. :RESTART3
  65. normcurs
  66. cls
  67. type usemenu3.doc
  68. pause
  69. goto end
  70.  
  71.  
  72.  
  73. :program
  74. normcurs
  75. cls
  76. echo           Install Program is extracting files to C:\diskjob
  77. echo off
  78. md c:\diskjob
  79. copy install2.exe c:\diskjob
  80. c:
  81. cd\diskjob
  82. install2
  83. del install2.exe
  84. goto complete
  85. :complete
  86. cls
  87. echo    Install program is now complete!  Type DISKJOB at the DOS prompt
  88. :end
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.